home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 41 / Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso / -seriously_amiga- / misc / wordpad / install.script < prev    next >
Text File  |  1999-04-19  |  4KB  |  146 lines
  1. ;$VER: WordPad Installer v0.2 (5/4/99)
  2.  
  3. ;set some message stuff-----------------------
  4.  
  5. (procedure english (
  6.   (set MSG_WELCOME "\n\nWelcome to the installation of Wordpad,\ndo you wish to proceed?")
  7.   (set MSG_DESTINATION "\nWhere do you want Wordpad to be installed.\nA drawer will be created.")
  8.   (set MSG_COPY "\nCopying source files\n")
  9.   (set MSG_NOMUI "You Have no installation of MUI,\nwhich is required for WordPad to Run.\nPlease install MUI Before Proceeding with this installation")
  10.  
  11.  
  12. ))
  13.  
  14.  
  15. (if (= @language "english") (english))
  16.  
  17.  
  18. (message (MSG_WELCOME))
  19.  
  20.  
  21.  
  22.        (set drive_dir
  23.           (askdir (prompt (MSG_DESTINATION))
  24.                   (help @askdir-help)
  25.                   (default @default-dest)
  26.                   (newpath))
  27.        )
  28.        (set dest_dir (tackon drive_dir "Wordpad"))
  29.                      (makedir dest_dir)
  30.  
  31.        (copyfiles (source "bin/images/WordPad.info")
  32.                   (dest drive_dir)
  33.  
  34.        )
  35.  
  36.  
  37.        (set @default-dest dest_dir)
  38.  
  39.        (copyfiles (prompt (MSG_COPY "Wordpad" @default-dest))
  40.                   (help @copyfiles-help)
  41.                   (source "bin/Wordpad")
  42.                   (dest dest_dir)
  43.        )
  44.        (copyfiles (source "bin/Wordpad.info")
  45.                   (dest dest_dir)
  46.        )
  47.  
  48.        (set images_dir (tackon dest_dir "Images"))
  49.                        (makedir images_dir)
  50.        (copyfiles (source "bin/Images.info")
  51.                   (dest dest_dir)
  52.        )
  53.        (copyfiles (source "bin/Images/main.toolbar")
  54.                   (dest images_dir)
  55.        )
  56.        (copyfiles (source "bin/Images/fimages.bsh")
  57.                   (dest images_dir)
  58.        )
  59.        (copyfiles (source "bin/Wordpad.guide")
  60.                   (dest dest_dir)
  61.        )
  62.        (copyfiles (source "bin/Wordpad.guide.info")
  63.                   (dest dest_dir)
  64.        )
  65.        (complete 80)
  66.  
  67.        ;Copy MUI MCC's--------------------------
  68.  
  69.        (copylib (prompt "MUI - TextEditor.mcc")
  70.                 (source "bin/mui/TextEditor.mcc")
  71.                 (dest "MUI:Libs/MUI/")
  72.                 (confirm 2)
  73.                 (help @copylib-help)
  74.        )
  75.        (copylib (prompt "MUI - TextEditor.mcp")
  76.                 (source "bin/mui/TextEditor.mcp")
  77.                 (dest "MUI:Libs/MUI/")
  78.                 (confirm 2)
  79.                 (help @copylib-help)
  80.        )
  81.        (copylib (prompt "MUI - Toolbar.mcc")
  82.                 (source "bin/mui/Toolbar.mcc")
  83.                 (dest "MUI:Libs/MUI/")
  84.                 (confirm 2)
  85.                 (help @copylib-help)
  86.        )
  87.        (copylib (prompt "MUI - Toolbar.mcp")
  88.                 (source "bin/mui/Toolbar.mcp")
  89.                 (dest "MUI:Libs/MUI/")
  90.                 (confirm 2)
  91.                 (help @copylib-help)
  92.        )
  93.        (copylib (prompt "MUI - TearOffBay.mcc")
  94.                 (source "bin/mui/TearOffBay.mcc")
  95.                 (dest "MUI:Libs/MUI/")
  96.                 (confirm 2)
  97.                 (help @copylib-help)
  98.        )
  99.        (copylib (prompt "MUI - TearOffPanel.mcc")
  100.                 (source "bin/mui/TearOffPanel.mcc")
  101.                 (dest "MUI:Libs/MUI/")
  102.                 (confirm 2)
  103.                 (help @copylib-help)
  104.        )
  105.        (copylib (prompt "MUI - TearOff.mcp")
  106.                 (source "bin/mui/TearOff.mcp")
  107.                 (dest "MUI:Libs/MUI/")
  108.                 (confirm 2)
  109.                 (help @copylib-help)
  110.        )
  111.        (copylib (prompt "MUI - CompactWindow.mcc")
  112.                 (source "bin/mui/CompactWindow.mcc")
  113.                 (dest "MUI:Libs/MUI/")
  114.                 (confirm 2)
  115.                 (help @copylib-help)
  116.        )
  117.        (copylib (prompt "MUI - CompactWindow.mcp")
  118.                 (source "bin/mui/CompactWindow.mcp")
  119.                 (dest "MUI:Libs/MUI/")
  120.                 (confirm 2)
  121.                 (help @copylib-help)
  122.        )
  123.        (copylib (prompt "MUI - TWFmultiLED.mcc")
  124.                 (source "bin/mui/TWFmultiLED.mcc")
  125.                 (dest "MUI:Libs/MUI/")
  126.                 (confirm 2)
  127.                 (help @copylib-help)
  128.        )
  129.        (copylib (prompt "MUI - TWFmultiLED.mcp")
  130.                 (source "bin/mui/TWFmultiLED.mcp")
  131.                 (dest "MUI:Libs/MUI/")
  132.                 (confirm 2)
  133.                 (help @copylib-help)
  134.        )
  135.  
  136.        (makedir "MUI:Images/SU_TearOff")
  137.        (set TO_Images "MUI:Images/SU_TearOff/")
  138.  
  139.        (copyfiles (source "bin/mui/images/")
  140.                   (dest TO_Images)
  141.                   (all)
  142.        )
  143.  
  144.  
  145. (exit (QUIET))
  146.